﻿<!-- #include file="mymin.asp" -->
<%
If Request("submit") <> "" Then

	if len(Request.Form("wapUrl"))<3 then
		Call Error("<card title='出错'><p>请输入网站地址！")
	end if

	if Request.Form("wapDay")<>"" then
		if isdate(Request.Form("wapDay"))=false then
			Call Error("<card title='出错'><p>首页倒计时时间设置出错，格式为2008-8-8")
		end if
	end if
	'----------------------------------------------------------------
	'	生成wap.asp文件
	'----------------------------------------------------------------
	dim HU_Config,HU_File

	HU_File= "../../config/wap.asp"'生成wap.asp文件路径

	HU_Config="<"&"%"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapStyle="""&Request.Form("wapStyle")&""" '网站样式"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapTitle="""&forQuote(Request.Form("wapTitle"))&""" '网站名称"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapUrl="""&forQuote(Request.Form("wapUrl"))&""" '网站地址"
	HU_Config=HU_Config+chr(13)&chr(10)&"waplogo="""&forQuote(Request.Form("waplogo"))&""" '网站LOGO"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapConst="""&Request.Form("wapConst")&""" '网站排版"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapReport="""&Request.Form("wapReport")&""" '全站公告"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogin="""&Request.Form("wapLogin")&""" '注册登录"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogout="""&forQuote(Request.Form("wapLogout"))&""" '游客显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLogined="""&forQuote(Request.Form("wapLogined"))&""" '登录显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapAccess="""&Request.Form("wapAccess")&""" '会员独享"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapFavor="""&Request.Form("wapFavor")&""" '首页问候语"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLink="""&Request.Form("wapLink")&""" '首页链接"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDiscuss="""&Request.Form("wapDiscuss")&""" '文章评论"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapHits="""&Request.Form("wapHits")&""" '文章点击率"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapGuest="""&Request.Form("wapGuest")&""" '留言显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDay="""&Request.Form("wapDay")&""" '首页倒计时"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapDayName="""&forQuote(Request.Form("wapDayName"))&""" '倒计时项目名"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapword="""&forQuote(Request.Form("wapword"))&""" '敏感词过滤"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLastc="""&Request.Form("wapLastc")&""" '底部显示"
	HU_Config=HU_Config+chr(13)&chr(10)&"wapLast="""&forQuote(Request.Form("wapLast"))&""" '底部控制"
	HU_Config=HU_Config+chr(13)&chr(10)&"%"&">"
	Call savetofile(HU_Config,HU_File)
	Call buildCssByStyle(Request.Form("wapStyle"))
	Response.Write "<card id='card2' title='正在返回' ontimer='index.asp?sid="&sid&"'><timer value='10'/><p>"
	Response.Write "成功设置！正在返回..."
else%>
<card id="index" title="网站首要配置">
<p align="left">
网站样式:<select name="wapStyle<%=time_r%>" value="<%=wapStyle%>">
<option value="3">wap2.0宽屏</option>
<option value="2">wap2.0窄版</option>
<option value="1">wap1.0</option>
</select><br/>
站点名称:<input name="wapTitle<%=time_r%>" type="text" value="<%=nowml(wapTitle)%>"/><br/>
网站地址:<input name="wapUrl<%=time_r%>" type="text" value="<%=nowml(wapUrl)%>"/><br/>
站点LOGO:<input name="waplogo<%=time_r%>" type="text" value="<%=nowml(waplogo)%>"/><br/>
网站排版:<select name="wapConst<%=time_r%>" value="<%=wapConst%>">
<option value="left">居左</option>
<option value="center">居中</option>
<option value="right" >居右</option>
</select><br/>
全站公告:<select name="wapReport<%=time_r%>" value="<%=wapReport%>">
<option value="1">显示</option>
<option value="0">不显示</option>
</select><br/>
注册登录:<select name="wapLogin<%=time_r%>" value="<%=wapLogin%>">
<option value="1">显示</option>
<option value="0">不显示</option>
</select><br/>
┗游客显示:<input name="wapLogout<%=time_r%>" type="text" value="<%=wapLogout%>"/><br/>
┗会员显示:<input name="wapLogined<%=time_r%>" type="text" value="<%=wapLogined%>"/><br/>
会员独享:<select name="wapAccess<%=time_r%>" value="<%=wapAccess%>">
<option value="0">默认功能</option>
<option value="1">文章阅读</option>
<option value="2">帖子阅读</option>
<option value="5">以上全部</option>
<option value="999">整个网站</option>
</select><br/>
首页问候语:<select name="wapFavor<%=time_r%>" value="<%=wapFavor%>">
<option value="1">显示</option>
<option value="0">不显示</option>
</select><br/>
首页链接:<select name="wapLink<%=time_r%>" value="<%=wapLink%>">
<option value="1">显示</option>
<option value="0">不显示</option>
</select><br/>
首页倒计时:<input name="wapDay<%=time_r%>" type="text" value="<%=wapDay%>"/><br/>
┗名称:<input name="wapDayName<%=time_r%>" type="text" value="<%=wapDayName%>"/><br/>
评论/群聊:<select name="wapDiscuss<%=time_r%>" value="<%=wapDiscuss%>">
<option value="1">需登录</option>
<option value="0">不限制</option>
</select><br/>
文章点击率:<select name="wapHits<%=time_r%>" value="<%=wapHits%>">
<option value="1">显示</option>
<option value="0">不显示</option>
</select><br/>
留言显示:<select name="wapGuest<%=time_r%>" value="<%=wapGuest%>">
<option value="1">需审核</option>
<option value="0">不审核</option>
</select><br/>
底部栏目:<select name="wapLastc<%=time_r%>" value="<%=wapLastc%>">
<option value="1">全站显示</option>
<option value="0">首页不显示</option>
</select><br/>
┗内容:<input name="wapLast<%=time_r%>" type="text" value="<%=nowml(wapLast)%>"/><br/>
敏感词过滤:<input name="wapword<%=time_r%>" type="text" value="<%=wapword%>"/><br/>
<anchor>保存配置
<go href="wap.asp?submit=true&amp;sid=<%=sid%>" method="post">
<postfield name="waplogo" value="$(waplogo<%=time_r%>)"/>
<postfield name="wapConst" value="$(wapConst<%=time_r%>)"/>
<postfield name="wapTitle" value="$(wapTitle<%=time_r%>)"/>
<postfield name="wapFavor" value="$(wapFavor<%=time_r%>)"/>
<postfield name="wapLink" value="$(wapLink<%=time_r%>)"/>
<postfield name="wapReport" value="$(wapReport<%=time_r%>)"/>
<postfield name="wapDay" value="$(wapDay<%=time_r%>)"/>
<postfield name="wapDayName" value="$(wapDayName<%=time_r%>)"/>
<postfield name="wapLast" value="$(wapLast<%=time_r%>)"/>
<postfield name="wapLastc" value="$(wapLastc<%=time_r%>)"/>
<postfield name="wapUrl" value="$(wapUrl<%=time_r%>)"/>
<postfield name="wapStyle" value="$(wapStyle<%=time_r%>)"/>
<postfield name="wapword" value="$(wapword<%=time_r%>)"/>
<postfield name="wapHits" value="$(wapHits<%=time_r%>)"/>
<postfield name="wapGuest" value="$(wapGuest<%=time_r%>)"/>
<postfield name="wapLogin" value="$(wapLogin<%=time_r%>)"/>
<postfield name="wapDiscuss" value="$(wapDiscuss<%=time_r%>)"/>
<postfield name="wapLogined" value="$(wapLogined<%=time_r%>)"/>
<postfield name="wapLogout" value="$(wapLogout<%=time_r%>)"/>
<postfield name="wapAccess" value="$(wapAccess<%=time_r%>)"/>
</go>
</anchor><br/>
温馨提示:<br/>
1、网站排版仅对wap1.0有效<br/>
2、底部栏目支持<a href="../ubbcl.asp?sid=<%=sid%>">UBB</a><br/>
<%end if%><br/>
<a href="index.asp?sid=<%=sid%>">[网站配置]</a><%call Last%>